home *** CD-ROM | disk | FTP | other *** search
- //---------------------------------------------------------------------------
- #ifndef ObuttonH
- #define ObuttonH
- //---------------------------------------------------------------------------
- #include <vcl\SysUtils.hpp>
- #include <vcl\Controls.hpp>
- #include <vcl\Classes.hpp>
- #include <vcl\Forms.hpp>
- #include <vcl\ExtCtrls.hpp>
- //---------------------------------------------------------------------------
- class TOButton : public TCustomControl
- {
- private:
- bool Pressed;
- TColor Color;
- void __fastcall SetColor(TColor OBrush, TColor OPen);
- protected:
- virtual void __fastcall Paint(void);
- virtual void __fastcall MouseDown
- (TMouseButton Button, Classes::TShiftState Shift, int X, int Y);
- virtual void __fastcall MouseUp
- (TMouseButton Button, Classes::TShiftState Shift, int X, int Y);
- public:
- void __fastcall SetSize (TRect Rechteck);
- __fastcall TOButton(TComponent* Owner);
- __published:
- __property OnClick;
- __property OnMouseDown;
- __property OnMouseUp;
- __property OnEnter;
- __property OnExit;
- __property OnKeyPress;
- __property OnKeyDown;
- __property OnKeyUp;
- };
- //---------------------------------------------------------------------------
- #endif
-